home *** CD-ROM | disk | FTP | other *** search
/ Virtual Vibrations / Virtual Vibrations.iso / mac / Virtual Vibrations / STAR.DXR / 00045.ls < prev    next >
Encoding:
Text File  |  1994-10-28  |  1.8 KB  |  89 lines
  1. on enterFrame
  2.   puppetPalette(0)
  3. end
  4.  
  5. on mouseDown
  6.   if (the clickOn >= 17) and (the clickOn <= 20) then
  7.     BUTTONDOWN()
  8.   else
  9.     if the clickOn = 48 then
  10.       puppetSound("click")
  11.     end if
  12.   end if
  13. end
  14.  
  15. on mouseUp
  16.   global voice, sourceScreen
  17.   if (the clickOn >= 17) and (the clickOn <= 20) then
  18.     if the clickOn = 17 then
  19.       set the movieRate of sprite 27 to 0
  20.       puppetSprite(12, 0)
  21.       puppetSprite(13, 0)
  22.       puppetSprite(23, 0)
  23.       puppetSprite(24, 0)
  24.       puppetSprite(25, 0)
  25.       puppetSprite(27, 0)
  26.       puppetSprite(48, 0)
  27.       set voice to 0
  28.       updateStage()
  29.       go("showMovie2")
  30.     end if
  31.     if the clickOn = 18 then
  32.       set the movieRate of sprite 27 to 0
  33.       puppetSprite(12, 0)
  34.       puppetSprite(13, 0)
  35.       puppetSprite(23, 0)
  36.       puppetSprite(24, 0)
  37.       puppetSprite(25, 0)
  38.       puppetSprite(27, 0)
  39.       puppetSprite(48, 0)
  40.       set voice to 0
  41.       updateStage()
  42.       go("hideMovie")
  43.     end if
  44.     if the clickOn = 19 then
  45.       ADDORDERBUTTON()
  46.     end if
  47.     if the clickOn = 20 then
  48.       set the movieRate of sprite 27 to 0
  49.       puppetSprite(12, 0)
  50.       puppetSprite(13, 0)
  51.       puppetSprite(23, 0)
  52.       puppetSprite(24, 0)
  53.       puppetSprite(25, 0)
  54.       puppetSprite(27, 0)
  55.       puppetSprite(48, 0)
  56.       set voice to 0
  57.       if soundBusy(2) then
  58.         sound stop 2
  59.       end if
  60.       updateStage()
  61.       if sourceScreen = 1 then
  62.         go("interac")
  63.       else
  64.         go("movies")
  65.       end if
  66.     end if
  67.   end if
  68.   if the clickOn = 48 then
  69.     CHANGESOUND6()
  70.   end if
  71.   if the clickOn = 23 then
  72.     go(the frame - 3)
  73.   end if
  74.   if the clickOn = 24 then
  75.     go(the frame - 1)
  76.   end if
  77.   if the clickOn = 25 then
  78.     go(the frame + 1)
  79.   end if
  80. end
  81.  
  82. on exitFrame
  83.   global clipLength, fixpal
  84.   if the movieTime of sprite 27 = clipLength then
  85.     go(the frame + 1)
  86.   end if
  87.   go(the frame)
  88. end
  89.